10 POKE 53280,6:POKE 53281,6
20 PRINTCHR$(14)"[147][155][205][204] [194]ASE.[207][194][202] IS A MACHINE LANGUAGE"
21 PRINT"ROUTINE THAT YOU CAN USE WITH YOUR OWN"
22 PRINT"[194][193][211][201][195] PROGRAMS.  [212]WO DEMO PROGRAMS ARE"
23 PRINT"INCLUDED ON THE MENU."
24 PRINT"[211]EE THE ARTICLE IN THE MAGAZINE FOR"
25 PRINT"INFORMATION ON USING [205][204] [194]ASE IN YOUR"
26 PRINT"OWN PROGRAMS."
90 PRINT"   [208][210][197][211][211] [193][206][217] [203][197][217] [212][207] [210][197][204][207][193][196] [212][200][197][160][205][197][206][213][146]"
100 POKE198,0:WAIT198,1:GETDH$
110 PRINT"[147]":S$="L[207]"+CHR$(34)+"MN"+CHR$(34)+",8:"+CHR$(131)
120 FORI=1TOLEN(S$):POKE630+I,ASC(MID$(S$,I)):NEXT:POKE198,I
130 POKE53281,15:POKE53280,15
140 PRINTCHR$(142)"[145]          RELOADING THE MENU[155]":END